home *** CD-ROM | disk | FTP | other *** search
/ CDV Software Presents (USA) / CDV Software Presents (USA).bin / data / hah.dxr / 00005_SetupGo.ls < prev    next >
Encoding:
Text File  |  2003-04-02  |  447 b   |  33 lines
  1. property myValue
  2.  
  3. on setupGo me, param
  4.   myValue = param
  5. end
  6.  
  7. on exitFrame me
  8.   if the frame = 1 then
  9.     myValue = EMPTY
  10.   end if
  11.   if the frame = 110 then
  12.     myValue = EMPTY
  13.   end if
  14.   if the frame = 130 then
  15.     myValue = EMPTY
  16.   end if
  17.   if the frame = 190 then
  18.     myValue = EMPTY
  19.   end if
  20.   case myValue of
  21.     "g1":
  22.       go(1)
  23.     "g2":
  24.       go(110)
  25.     "g3":
  26.       go(130)
  27.     "g4":
  28.       go(190)
  29.     "g5":
  30.       go(200)
  31.   end case
  32. end
  33.